$a = 10;
while( $a < 20 ){
   if( $a == 15)
   {
       # terminate the loop.
       $a = $a + 1;
       last;				#类似于C语言中的break
   }
   print "value of a: $a\n";
   $a = $a + 1;
}

print "end\n";